home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Games Machine 113
/
XENIATGM113.iso
/
Patch
/
No One Lives Forever
/
NOLFUpdate003.exe
/
Setup
/
French
/
french.rul
< prev
next >
Wrap
Text File
|
2001-04-25
|
3KB
|
101 lines
//
// FRENCH UPDATE setup.rul
//
// NOTE: Changes made to this script should be made to the scripts for each
// other language too!
//
// Game & folder names
#define APP_TITLE "Mise α jour de NOLF (v1.003)"
#define APP_NAME "No One Lives Forever"
#define APP_VERSION "1.0"
#define APP_KEY "NOLF.exe"
#define DEFAULT_PATH "Fox\\No One Lives Forever"
#define DEFAULT_GROUP "Fox Interactive\\No One Lives Forever"
#define UPDATE_VERSION "1.003"
#define UPDATE_COMMAND "-rez Nolfu003.rez -rez Nolfcres003.rez"
#define README_FILE "READMEU003.TXT"
declare
NUMBER nResult;
NUMBER nType, nSize;
STRING svSrcDir, svTargetDir;
STRING svRegKey;
STRING svTemp;
STRING svVersion;
program
start:
// Set paths
svSrcDir = SRCDIR ^ "..\\..\\";
// Setup screen & title
Enable(BACKGROUND);
SetColor(BACKGROUND, RGB(236, 164, 4));
SetTitle(APP_TITLE, 26, WHITE);
SetColor(STATUSBAR, BK_SOLIDBLUE);
PlaceBitmap(svSrcDir ^ "SETUP\\NOLF1.BMP", 1, CENTERED, CENTERED, CENTERED);
Delay(2);
// Get installed path from registry
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
svRegKey = "Software\\Monolith Productions\\" + APP_NAME + "\\" + APP_VERSION;
nType = REGDB_STRING;
nSize = -1;
nResult = RegDBGetKeyValueEx(svRegKey, "WorkingDirectory", nType, svTargetDir, nSize);
if (nResult < 0) then
svTemp = "Impossible de mettre α jour " + APP_NAME + " α la version " + UPDATE_VERSION + "!\n\nVΘrifiez que le jeu a ΘtΘ correctement installΘ.";
MessageBox(svTemp, WARNING);
exit;
endif;
// Check version number of what's already installed
nType = REGDB_STRING;
nSize = -1;
nResult = RegDBGetKeyValueEx(svRegKey, "Version", nType, svVersion, nSize);
if (nResult = 0) then
nResult = StrCompare(svVersion, UPDATE_VERSION);
if (nResult > 0) then
svTemp = "Vous utilisez la version " + svVersion + " de " + APP_NAME +
".\n\nUne mise α jour vers la version " + UPDATE_VERSION +
" est donc impossible.\n\nVous pouvez tΘlΘcharger les derniΦres" +
" mises α jour du jeu α partir du site http://www.the-operative.com";
MessageBox(svTemp, INFORMATION);
exit;
endif;
endif;
// Show status window
Disable(FEEDBACK_FULL);
Enable(STATUS);
Enable(INDVFILESTATUS);
PlaceWindow(STATUS, CENTERED, 0, LOWER_RIGHT);
SetStatusWindow(0, "Mise α jour de " + APP_NAME + "...");
// Copy all game files...
StatusUpdate(ON, 100);
SRCDIR = svSrcDir ^ "GAME";
TARGETDIR = svTargetDir;
CopyFile("*.*", "*.*");
// Copy language-specific files...
SRCDIR = svSrcDir ^ "GAME\\FRENCH";
CopyFile("*.*", "*.*");
// Display done message
SetStatusWindow(1000, "Mise α jour terminΘe !");
// Set new registry keys
RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
RegDBSetKeyValueEx(svRegKey, "Version", REGDB_STRING, UPDATE_VERSION, -1);
RegDBSetKeyValueEx(svRegKey, "Update Command Line", REGDB_STRING, UPDATE_COMMAND, -1);
// Do the readme...
svTemp = "La mise α jour de " + APP_NAME + " est terminΘe. Souhaitez-vous lire le fichier LISEZMOI maintenant ?";
if (AskYesNo(svTemp, YES) = YES) then
LaunchAppAndWait("NOTEPAD.EXE " + svTargetDir ^ README_FILE, "", NOWAIT);
endif;
exit;